home *** CD-ROM | disk | FTP | other *** search
- /*
- ### from window coords to primary coordinates ###
-
- Input: vw: window coords
- sw: 0=primary coords 1=secondary coords
- Output: vx: in primary coords
- NOTE: sw can be either polar_coord or polar_section
- */
-
- from_window_variables(vx,vw,sw)
- double vx[],vw[];
- int sw;
- {
- int i;
- extern model,var_dim,enable_polar;
-
- if(enable_polar== 1 && sw == 1)
- polar_to_euclid(vx,vw);
- else {
- for(i=0;i<var_dim;i++) vx[i]=vw[i];
- }
- }
-